Fix animation timeout delay calculation

* lisp/image.el (image-animate-timeout):
Don’t assume speed is floating-point.

diff --git a/lisp/image.el b/lisp/image.el
index d557e39aac28b151713eb71082bbe7694f960fb4..295b79f161d99f6e35eef2c97638652b6437efe3 100644 (file)
--- a/lisp/image.el
+++ b/lisp/image.el
@@ -735,7 +735,7 @@ for the animation speed.  A negative value means to animate in reverse."
           ;; Subtract off the time we took to load the image from the
           ;; stated delay time.
           (delay (max (+ (* (or (cdr animation) image-default-frame-delay)
-                            (/ 1 (abs speed)))
+                            (/ 1.0 (abs speed)))
                          time (- (float-time)))
                       image-minimum-frame-delay))
           done)